<f:view xmlns:h="http://java.sun.com/jsf/html"
        xmlns:ui="http://java.sun.com/jsf/facelets"
        xmlns:fn="http://java.sun.com/jsp/jstl/functions"
        xmlns:g="http://code.google.com/p/ada-ado/generator"
        xmlns:f="http://java.sun.com/jsf/core"
	mode="once"
        file="regtests/#{projectName}-testsuite.adb">-----------------------------------------------------------------------
--  #{projectName}-testsuite -- Testsuite for #{projectName}
<ui:include src="../licenses/license-ada.xhtml"/>
-----------------------------------------------------------------------
#{''}
with ASF.Server.Tests;
with #{fn:capitalize(projectName)}.Applications;
package body #{fn:capitalize(projectName)}.Testsuite is
#{''}
   Tests : aliased Util.Tests.Test_Suite;
#{''}
   function Suite return Util.Tests.Access_Test_Suite is
   begin
      return Tests'Access;
   end Suite;
#{''}
   procedure Initialize (Props : in Util.Properties.Manager) is
      App  : constant #{fn:capitalize(projectName)}.Applications.Application_Access := new #{fn:capitalize(projectName)}.Applications.Application;
   begin
      #{fn:capitalize(projectName)}.Applications.Initialize (App);
      ASF.Server.Tests.Set_Context (App.all'Access);
   end Initialize;
#{''}
end #{fn:capitalize(projectName)}.Testsuite;
</f:view>
